home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 23.zip / BS1 part 23 / Amigazette 9.adf / Basic / Muis-Coordinaten < prev    next >
Text File  |  1991-03-15  |  478b  |  22 lines
  1. REM
  2. REM Demo van de tekst 'BlitterCopy'.
  3. REM
  4.  
  5. REM Libraries + .BMaps : ldscr.library in de LIBS:-directory
  6. REM                      ldscr.Bmap in de LIBS:-directory
  7. REM
  8.  
  9. DECLARE FUNCTION Ldscr& LIBRARY
  10. LIBRARY "ldscr.library"      : REM ldscr.bmap
  11.  
  12. SCREEN 4,320,256,4,1:WINDOW 4,,,0,4
  13. Naam$="SYS:Lo-Res/Pic01":GOSUB LeesScherm
  14. Lus:
  15. WHILE MOUSE(0)=0:WEND
  16. LOCATE 1,1:PRINT MOUSE(1),MOUSE(2):GOTO Lus
  17.  
  18. LeesScherm:
  19. Scherm$=Naam$+CHR$(0)
  20. sch&=ldscr& (SADD(scherm$),WINDOW(7))
  21. RETURN
  22.